home *** CD-ROM | disk | FTP | other *** search
/ Softwarová Záchrana 3 / Softwarova-zachrana-3.bin / Xteq X-Setup / xqdcXSP-Setup-EN.exe / {app} / plugins / XQ WinXP AVI Preview 1.xpl < prev    next >
Text File  |  2003-12-31  |  3KB  |  78 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="6"
  3. "COUNT"="1"
  4. "UIPATH 1"="Appearance\Explorer\Settings"
  5. "UIPATH 2"="Appearance\Files&Folders\Files"
  6. "NAME"="Show AVI Preview in Explorer"
  7. "VERSION"="1.00"
  8. "LANGUAGE"="VBScript"
  9. "OSVERSION"="0000011"
  10. "TEXT 1"="Show AVI Preview in Explorer"
  11. "DESCRIPTION 1"="Windows is able to display preview of a movie file (*.AVI) when you are using the Explorer with Web view. When you highlight an AVI file, Windows will display the Windows Media Control Panel on the left where you can play, stop, pause etc. the currently selected file."
  12. "DESCRIPTION 2"="It's a very good feature if you are using mostly short movies (max 10 Minutes) since it takes only a few seconds to update that preview. However, if you mostly have huge movie files, for example those 740 MB DivX files, this preview can crash your Explorer. First, it takes at about two minutes until the preview is visible for such a huge file. While this happens, the Explorer window is locked and appears as "Not responding". Secondly, this preview can prevent you from deleting those movie files since they are locked by the preview and thus the delete command will fail with the message "Unable to delete, file is locked"."
  13. "DESCRIPTION 3"="If you do not need the preview of movie files (*.AVI) you might simply disable this function here. You can of course still double-click the file and view the movie file in the player of your choice."
  14. "AUTHOR"="Xteq Systems"
  15. "CONTACTURL"="http://www.xteq.com/"
  16. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  17. "COMMENT 1"="Found in c't 1/2004"
  18.  
  19.  
  20.  
  21. sV="HKLM\SOFTWARE\Classes\CLSID\{87D62D94-71B3-4b9a-9489-5FE6850DC73E}\InProcServer32\@"
  22. sV_Bak="HKLM\SOFTWARE\Classes\CLSID\{87D62D94-71B3-4b9a-9489-5FE6850DC73E}\InProcServer32\XSP Backup of (Default) Value"
  23.  
  24. sDefault_Value="%SystemRoot%\System32\shmedia.dll"
  25.  
  26. Sub Plugin_Initialize 
  27.  s=RegReadValue(sV)
  28.  if len(s)>0 then 
  29.     SetUIElement 1,true
  30.  end if
  31. End Sub
  32.  
  33.  
  34. Sub Plugin_CheckData(ElementIndex)
  35. End Sub
  36.  
  37.  
  38.  
  39. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  40.  b=GetUIElement(1)
  41.  if b=true then
  42.     s=RegReadValue(sV)
  43.     if len(s)>0 then
  44.        'do nothing, original value contains a value!
  45.     else
  46.        s=RegReadValue(sV_Bak) 'retrieve backup
  47.        if len(s)=0 then
  48.           Call MsgWarning("Unable to find backup value of original value, will use Windows XP default value!") 
  49.           s=sDefault_Value
  50.        end if
  51.        Call RegWriteValue(sV,s,4)
  52.  
  53.        if RegValueExists(sV_Bak) then Call RegDeleteValue(sV_Bak)
  54.     end if
  55.  
  56.  
  57.  else
  58.     if RegValueExists(sV_Bak) then
  59.        'do nothing, we already have disable the feature and also created a backup
  60.     else
  61.        s=RegReadValue(sV)
  62.        Call RegWriteValue(sV_Bak,s,4)
  63.  
  64.        'now disable the real entry
  65.        Call RegWriteValue(sV,"",4)
  66.     end if
  67.  end if
  68.  
  69.  Call Restart()
  70. End Sub
  71.  
  72.  
  73. Sub Plugin_Terminate 
  74. End Sub
  75.  
  76.  
  77.  
  78.